#pragma once

#include <iostream>
#include <string>
#include <sys/socket.h>
#include <arpa/inet.h>
#include <netinet/in.h>
#include <unistd.h>
#include <memory>
#include <cstring>
#include <cstdlib>
#include "Common.hpp"
#include "Log.hpp"
#include "InerAddr.hpp"
#include <signal.h>
#include <sys/wait.h>
#include <pthread.h>
#include "ThreadPool.hpp"

using namespace LogModule;
using namespace ThreadPoolModule;

// using task_t = std::function<void*>;
using func_t = std::function<std::string(const std::string &, InerAddr &)>;

const static int defaultsockfd = -1;
const static int backlog = 8;
class TcpServer : public NoCopy
{
public:
    TcpServer(uint16_t port, func_t func) : _port(port), _listensockfd(defaultsockfd), _isrunning(false), _func(func)
    {
    }

    void Init()
    {
        // signal(SIGPIPE, SIG_IGN); // 忽略SIGPIPE信号
        _listensockfd = socket(AF_INET, SOCK_STREAM, 0);
        if (_listensockfd < -1)
        {
            LOG(LogLevel::FATAL) << "create socket failed";
            exit(SOCKET_ERR);
        }
        LOG(LogLevel::INFO) << "create socket success: " << _listensockfd;

        // 2. bind总所周知的端口号
        InerAddr local(_port);
        int n = bind(_listensockfd, CONV(local), sizeof(local));
        if (n < 0)
        {
            LOG(LogLevel::FATAL) << "bind socket failed";
            exit(BIND_ERR);
        }
        LOG(LogLevel::INFO) << "bind socket success: " << _listensockfd;

        // 3. 监听端口
        int m = listen(_listensockfd, backlog);
        if (m < 0)
        {
            LOG(LogLevel::FATAL) << "listen socket failed";
            exit(LISTEN_ERR);
        }
        LOG(LogLevel::INFO) << "listen socket success: " << _listensockfd;
    }

    // 短服务
    // 长服务
    void Service(int sockfd, InerAddr &addr)
    {
        char buffer[1024];
        while (true)
        {
            // 1. 读取数据
            ssize_t n = read(sockfd, buffer, sizeof(buffer) - 1);

            if (n > 0)
            {
                // buffer是一个英文单词
                buffer[n] = 0;
                LOG(LogLevel::DEBUG) << addr.StringAddr() << " # " << buffer;
                std::string echo_string = _func(buffer, addr);
                // 2. 写回数据
                // std::string echo_string = "echo# " + std::string(buffer);

                write(sockfd, echo_string.c_str(), echo_string.size());
            }
        }
    }
    class ThreadData
    {
    public:
        ThreadData(int socfd, InerAddr adr, TcpServer *tsr) : addr(adr), sockfd(socfd), tsvr(tsr)
        {
        }

    public:
        InerAddr addr;
        int sockfd;
        TcpServer *tsvr;
    };

    static void *Routine(void *args)
    {
        pthread_detach(pthread_self());
        ThreadData *td = static_cast<ThreadData *>(args);
        td->tsvr->Service(td->sockfd, td->addr);
        delete td;
        return nullptr;
    }

    void Run()
    {
        _isrunning = true;
        while (_isrunning)
        {
            // 4. 获取新链接
            // 4.1 你获取的链接在哪里？从内核中直接获取的，建立链接的过程和accept无关，accept只是获取链接的描述符。
            // 如果没有链接就会阻塞
            struct sockaddr_in peer;
            socklen_t len = sizeof(sockaddr_in);
            int sockfd = accept(_listensockfd, CONV(peer), &len);
            if (sockfd < 0)
            {
                LOG(LogLevel::WARNING) << "accept socket failed";
                continue;
            }
            InerAddr addr(peer);
            LOG(LogLevel::INFO) << "accept socket success, peer addr: " << addr.StringAddr();

            // version2 ---- 多线程版本
            ThreadData *td = new ThreadData(sockfd, addr, this);
            pthread_t tid;
            pthread_create(&tid, nullptr, Routine, td);
            // 5. 处理链接
            // version1 ---- 单进程版本
            // Service(sockfd, addr); // 单进程的时候只能处理一个链接，当第二个链接来的时候，会阻塞来自第一个链接的读写操作

            // versionl ---- 多进程版本
            // 5.1 子进程处理链接
            // 5.2 父进程继续获取新链接
            // pid_t id = fork();
            // if(id < 0)
            // {
            //     LOG(LogLevel::FATAL) << "fork process failed";
            //     exit(FORK_ERR);
            // }
            // else if(id == 0)
            // {
            //     // 不让子进程访问listensockfd
            //     close(_listensockfd);
            //     if(fork() > 0) // 再次fork, 父进程退出
            //         break;
            //     Service(sockfd, addr);
            //     exit(OK);
            // }
            // else
            // {
            //     close(sockfd);

            //     // 需要回收子进程：1. 忽略SIGCHLD信号 2. 子进程退出，让孙子进程接管
            //     pid_t rid = waitpid(id, nullptr, 0);
            //     (void)rid;
            // }

            // version2 ---- 多线程版本
            // ThreadData *td = new ThreadData(sockfd, addr, this);
            // pthread_t tid;
            // pthread_create(&tid, nullptr, Routine, td);

            // version3 ---- 线程池版本，一般适合处理短服务
            // ThreadPool<task_t>::GetIntance()->Enqueue([this, &sockfd, &addr](){
            //     this->Service(sockfd, addr);
            // });
        }
        _isrunning = false;
    }

    ~TcpServer()
    {
    }

private:
    uint16_t _port;
    int _listensockfd; // 监听套接字
    bool _isrunning;

    func_t _func;
};
